perm filename POX2.PUB[D,LES] blob
sn#138069 filedate 1974-12-31 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 .device XGP
C00005 ENDMK
C⊗;
.device XGP;
.page frame 52 high 80 wide
.area text lines 1 to 52
.nofill; turn on "\α"; turn on "∀" for "%";
.at "\C"; ⊂ once center; ⊃;
.at "\R"; ⊂ once flush right; ⊃;
.at "\J"; ⊂ fill; adjust; compact; ⊃;
.at "\."; ⊂ nofill; ⊃;
.at "\@" filename ";"; ⊂ require "filename" source; ⊃;
.at "\M0" dfont ";" ⊂ font G "dfont"; ⊃;
.at "\M1" dfont ";" ⊂ font 1 "dfont"; ⊃;
.at "\M2" dfont ";" ⊂ font 2 "dfont"; ⊃;
.at "\M3" dfont ";" ⊂ font 3 "dfont"; ⊃;
.at "\M4" dfont ";" ⊂ font 4 "dfont"; ⊃;
.at "\M5" dfont ";" ⊂ font 5 "dfont"; ⊃;
.at "\M6" dfont ";" ⊂ font 6 "dfont"; ⊃;
.at "\M7" dfont ";" ⊂ font 7 "dfont"; ⊃;
.at "\M8" dfont ";" ⊂ font 8 "dfont"; ⊃;
.at "\M9" dfont ";" ⊂ font 9 "dfont"; ⊃;
.at "\MA" dfont ";" ⊂ font A "dfont"; ⊃;
.at "\MB" dfont ";" ⊂ font B "dfont"; ⊃;
.at "\MC" dfont ";" ⊂ font C "dfont"; ⊃;
.at "\MD" dfont ";" ⊂ font D "dfont"; ⊃;
.at "\ME" dfont ";" ⊂ font E "dfont"; ⊃;
.at "\MF" dfont ";" ⊂ font F "dfont"; ⊃;
.AT "\F0"; ⊂("∀G")⊃;
.AT "\F1"; ⊂("∀1")⊃;
.AT "\F2"; ⊂("∀2")⊃;
.AT "\F3"; ⊂("∀3")⊃;
.AT "\F4"; ⊂("∀4")⊃;
.AT "\F5"; ⊂("∀5")⊃;
.AT "\F6"; ⊂("∀6")⊃;
.AT "\F7"; ⊂("∀7")⊃;
.AT "\F8"; ⊂("∀8")⊃;
.AT "\F9"; ⊂("∀9")⊃;
.AT "\FA"; ⊂("∀A")⊃;
.AT "\FB"; ⊂("∀B")⊃;
.AT "\FC"; ⊂("∀C")⊃;
.AT "\FD"; ⊂("∀D")⊃;
.AT "\FE"; ⊂("∀E")⊃;
.AT "\FF"; ⊂("∀F")⊃;
.portion main; place text;
\@NEWS75[CUR,JMC];